#pragma once

#include <iostream>
#include <string>
#include <memory>
#include "Log.hpp"
#include "Socket.hpp"

#define NUM sizeof(fd_set) * 8
using namespace SocketModule;
using namespace LogModule;

const int gdefaultfd = -1;

class SelectServer
{
public:
    SelectServer(uint16_t port)
        : _port(port), _listen_socket(std::make_unique<TcpSocket>()), _isrunning(false)
    {
    }

    void Init()
    {
        _listen_socket->BuildTcpSocketMethod(_port);
        // 初始化辅助数组
        for (int i = 0; i < NUM; i++)
        {
            _fd_array[i] = gdefaultfd;
        }

        // 将listensockfd添加到数组中
        _fd_array[0] = _listen_socket->Fd();
    }

    void Loop()
    {
        fd_set rfds; // 读文件描述符集
        _isrunning = true;
        while (_isrunning)
        {
            // 1.清空rfds
            FD_ZERO(&rfds);
            int maxfd = gdefaultfd;

            // // 2.将listensockfd添加到rfds中
            // FD_SET(_listen_socket->Fd(), &rfds);
            for (int i = 0; i < NUM; i++)
            {
                if (_fd_array[i] == gdefaultfd)
                    continue;
                // 将合法的fd设置进入集合中
                FD_SET(_fd_array[i], &rfds);
                if (_fd_array[i] > maxfd)
                {
                    maxfd = _fd_array[i];
                }
            }

            // InetAddr client;
            // // accept 是阻塞式的
            // // 从listensockfd获取新链接，本质也是一种IO
            // int newsockfd = _listen_socket->Accepter(&client);

            struct timeval timeout = {10, 0};
            // 我们不能让accept来阻塞检测链接到来，而应该让select负责进行就绪事件的检测
            int n = select(maxfd + 1, &rfds, nullptr, nullptr, &timeout);
            switch (n)
            {
            case 0:
                std::cout << "time out..." << std::endl;
                break;
            case -1:
                perror("select");
                break;
            default:
                std::cout << "有事件就绪了..., timeout: " << timeout.tv_sec << std::endl;
                Dispatcher(rfds); // 把已经就绪的fd，派发给指定的模块
                break;
            }
        }
        _isrunning = false;
    }

    void Accepter()
    {
        InetAddr client;
        // 不会阻塞了，也就是不用等了，只用拷贝就行
        int newfd = _listen_socket->Accepter(&client);
        if (newfd < 0)
            return;
        else
        {
            std::cout << "获得了一个新链接: " << newfd << ", client info: " << client.Addr() << std::endl;
            // 把新的newfd添加到辅助数组中
            int pos = -1;
            for (int i = 0; i < NUM; i++)
            {
                if (_fd_array[i] == gdefaultfd)
                {
                    pos = i;
                    break;
                }
            }
            if (pos == -1)
            {
                LOG(LogLevel::ERROR) << "服务器已经满了...";
                close(newfd);
            }
            else
            {
                _fd_array[pos] = newfd;
            }
        }
    }

    void Recver(int who)
    {
        char buffer[1024];
        ssize_t n = recv(_fd_array[who], buffer, sizeof(buffer) - 1, 0);
        if (n > 0)
        {
            buffer[n] = 0;
            std::cout << "client# " << buffer << std::endl;

            std::string message = "echo# ";
            message += buffer;
            send(_fd_array[who], message.c_str(), message.size(), 0);
        }
        else if (n == 0)
        {
            LOG(LogLevel::DEBUG) << "客户端退出..., sockfd: " << _fd_array[who];
            close(_fd_array[who]);
            _fd_array[who] = gdefaultfd;
        }
        else
        {
            LOG(LogLevel::DEBUG) << "客户端读取错误..., sockfd: " << _fd_array[who];
            close(_fd_array[who]);
            _fd_array[who] = gdefaultfd;
        }
    }

    void Dispatcher(fd_set &rfds)
    {
        for (int i = 0; i < NUM; i++)
        {
            if (_fd_array[i] == gdefaultfd)
                continue;
            if (_fd_array[i] == _listen_socket->Fd())
            {
                // 是listensockfd，并且已经添加的集合中了
                if (FD_ISSET(_fd_array[i], &rfds))
                {
                    Accepter();
                }
            }
            else
            {
                // 就绪的普通fd
                if (FD_ISSET(_fd_array[i], &rfds))
                {
                    Recver(i);
                }
            }
        }
    }
    ~SelectServer()
    {
    }

private:
    uint16_t _port;
    std::unique_ptr<Socket> _listen_socket;
    bool _isrunning;
    int _fd_array[NUM]; // 辅助数组
};